home *** CD-ROM | disk | FTP | other *** search
/ BMUG PD-ROM 1995 Fall / PD-ROM F95.toast / Programming / Programming Languages / UCB Logo 3.0 ƒ / logolib / arraytolist < prev    next >
Encoding:
Text File  |  1992-09-04  |  147 b   |  6 lines  |  [TEXT/ttxt]
  1. to arraytolist :array [:dim count :array] [:limit :dim + first :array]
  2. op cascade :dim [fput item (:limit - #) :array ?] []
  3. end
  4.  
  5. bury "arraytolist
  6.